use "dataset_east_baton_rouge_police_violence", clear

gen month = month(date)
gen year = year(date)

#delimit;

gr tw
	(sc hits month, col(black))
	(sc hits month, mlab(name) msym(none) mlabangle(90) mlabpos(1)
		mlabsize(large) mlabcol(gray))
	,
		by(year, note("") imargin(zero) rows(1) legend(off))
		plotregion(style(none))
		ylab(, angle(horiz))
		yscale(range(0 200))
		xtitle("Month")
		ytitle("Coverage")
		xlab(1(1)12, labsize(vsmall))
		subtitle(, fcol(none) lwid(none))
		xsize(2)
		ysize(1)
		xline(15)
		;

#delimit cr

gr export "_output/figure A2.pdf", replace
